home *** CD-ROM | disk | FTP | other *** search
/ Graphics & Sound Program…ng Techniques for the Mac / Graphics and Sound Programming Techniques for the Mac.iso / M&T Graphics & Sound Examples / Metrowerks Versions / C07 QuickTime Movies / P04 Quick Controller / QuickController.c next >
Encoding:
C/C++ Source or Header  |  1995-08-05  |  3.1 KB  |  122 lines  |  [TEXT/MMCC]
  1. //____________________________________________________________
  2. //    QuickController.c
  3. //
  4. //    Copyright © Dan Parks Sydow, 1995
  5. //    From the book:
  6. //    "Graphics and Sound Programming Techniques for the Mac",
  7. //    M&T Books, 1995
  8.  
  9.  
  10. //____________________________________________________________
  11.  
  12. #include <Movies.h>   
  13. #include <Gestalt.h>
  14.  
  15.  
  16. //____________________________________________________________
  17.  
  18. void  InitializeAllToolboxes( void );
  19.  
  20.  
  21. //____________________________________________________________
  22.  
  23. #define      rMovieWindow           128
  24. #define      kMovieName        "\pRobot"
  25.  
  26.  
  27. //____________________________________________________________
  28.  
  29. void  main( void )
  30. { 
  31.    OSErr            theError;
  32.    FSSpec           theFSSpec;
  33.    short            theFileRefNum;
  34.    Movie            theMovie;
  35.    short            theMovieResID = 0;   
  36.    Str255           theMovieResName;
  37.    Boolean          wasAltered;
  38.    WindowPtr        theWindow;
  39.    Rect             theMovieBox;
  40.    Rect             theBoundsRect;
  41.    MovieController  theController = nil;
  42.    EventRecord      theEvent;
  43.    Boolean          isControllerEvent;
  44.    Boolean          allDone = false;
  45.  
  46.    InitializeAllToolboxes();
  47.    
  48.    theError = FSMakeFSSpec( 0, 0, kMovieName, &theFSSpec );
  49.    theError = OpenMovieFile( &theFSSpec, &theFileRefNum, fsRdPerm );
  50.    theError = NewMovieFromFile( &theMovie, theFileRefNum, &theMovieResID,
  51.                                  theMovieResName, newMovieActive, &wasAltered );
  52.                                          
  53.    CloseMovieFile( theFileRefNum );
  54.    
  55.    theWindow = GetNewCWindow( rMovieWindow, nil, (WindowPtr)-1L );   
  56.  
  57.    SetMovieGWorld( theMovie, (CGrafPtr)theWindow, nil );   
  58.  
  59.    GetMovieBox( theMovie, &theMovieBox );
  60.  
  61.    theController = NewMovieController( theMovie, &theMovieBox, mcTopLeftMovie);   
  62.  
  63.    MCGetControllerBoundsRect( theController, &theBoundsRect );
  64.  
  65.    SizeWindow( theWindow, theBoundsRect.right, theBoundsRect.bottom, true );  
  66.    ShowWindow( theWindow );
  67.  
  68.    while ( allDone == false )
  69.    {
  70.       WaitNextEvent( everyEvent, &theEvent, 15L, nil );
  71.       
  72.       if ( theController == nil )
  73.          isControllerEvent = false;
  74.       else
  75.          isControllerEvent = MCIsPlayerEvent( theController, &theEvent );
  76.       
  77.       if ( isControllerEvent == false )
  78.       {
  79.          switch ( theEvent.what )
  80.          {
  81.             case keyDown:
  82.                allDone = true;
  83.                break;
  84.          }
  85.       }
  86.    }
  87.  
  88.    DisposeMovieController( theController );
  89.    theController = nil;
  90.    DisposeMovie( theMovie );
  91.    DisposeWindow( theWindow );
  92. }
  93.  
  94.  
  95. //____________________________________________________________
  96.  
  97. void  InitializeAllToolboxes( void )
  98. {
  99.    OSErr  theError;
  100.    long   theResult;
  101.  
  102.    InitGraf( &qd.thePort );
  103.    InitFonts();
  104.    InitWindows();
  105.    InitMenus();
  106.    TEInit();
  107.    InitDialogs( 0L );
  108.    FlushEvents( everyEvent, 0 );
  109.    InitCursor();
  110.  
  111.    theError = Gestalt( gestaltQuickTime, &theResult );
  112.    if ( theError != noErr )
  113.       ExitToShell();
  114.                                                  
  115.    theError = EnterMovies();  
  116.    if ( theError != noErr )
  117.       ExitToShell(); 
  118. }
  119.  
  120.  
  121.  
  122.